home *** CD-ROM | disk | FTP | other *** search
- 10 POKE 56334, PEEK(56334) AND 254
- 15 POKE 1, PEEK(1) AND 251
- 20 FOR X=12288 TO 12799: POKE X, PEEK(X+40960): NEXT X
- 25 POKE 1, PEEK(1) OR 4
- 30 POKE 56334, PEEK(56334) OR 1
- 35 POKE 53272, (PEEK(53272) AND 240) OR 12
- 40 FOR X1=1 TO 2:READ A$
- 45 Y= 12288+(ASC(A$)-64)*8
- 50 FOR X=Y TO Y+7: READ A: POKE X,A: NEXT X,X1
- 55 POKE53270, PEEK(53270) OR 16
- 60 PRINT CHR$(147); "AB"
- 65 POKE 55296,12: POKE 55297,12
- 70 POKE 53282,1:POKE 53283,3
- 75 DATA "A", 0, 224, 248, 248, 170, 85, 170, 0
- 80 DATA "B", 0, 0, 0, 0, 168, 85, 168, 0
-